﻿Imports DNP.GestionComercial.DAL
Public Class RepresentanteBL
    Public Function GuardarRepresentante(ByVal pObjeto As RepresentanteBE) As RespuestaBE
        Dim odlObjeto As New RepresentanteDAL
        Return odlObjeto.GuardarRepresentante(pObjeto)
    End Function
    Public Function EliminarRepresentante(ByVal pObjeto As PARAMETROBE) As RespuestaBE
        Dim odlObjeto As New RepresentanteDAL
        Return odlObjeto.EliminarRepresentante(pObjeto)
    End Function
    Public Function listarRepresentante(ByVal pParametro As PARAMETROBE) As RespuestaBE
        Dim odlObjeto As New RepresentanteDAL
        Return odlObjeto.listarRepresentante(pParametro)
    End Function
    Public Function listarRepresentantexCodigo(ByVal pcodigo As String) As RespuestaBE
        Dim odlObjeto As New RepresentanteDAL
        Return odlObjeto.listarRepresentantexCodigo(pcodigo)
    End Function

    Public Function ListarTodo(ByVal obj As RepresentanteBE) As RespuestaBE
        Return New RepresentanteDAL().ListarTodo(obj)
    End Function

End Class
